Public Class clsFrmReGnrt

  Public Sub mPrInit(ByVal aIntTblId As Integer)

  End Sub

End Class
